inherited frmCarryProfitLoss: TfrmCarryProfitLoss
  Left = 538
  Top = 216
  Caption = #32467#36716#25439#30410
  ClientHeight = 383
  ClientWidth = 392
  ExplicitWidth = 398
  ExplicitHeight = 411
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    Width = 392
    Height = 110
    Color = 16773345
    ExplicitWidth = 392
    ExplicitHeight = 110
    inherited labFuncName: TLabel
      Top = 11
      Width = 366
      Height = 24
      AutoSize = False
      Caption = '    '#27880#24847#65306#22312#32467#36716#26412#26399#25439#30410#20197#21069#65292#35201#27714#26412#26399#25104#26412#32467#36716#21046#20316#23436#25104#65292#35201#27714#23558#26412#26399#30340#20973#35777#20840#37096#30331#24080#12290
      Color = clBlack
      Font.Color = clRed
      ParentColor = False
      WordWrap = True
      ExplicitTop = 11
      ExplicitWidth = 366
      ExplicitHeight = 24
    end
    inherited labFuncDesc: TLabel
      Left = 14
      Top = 48
      Width = 361
      Height = 54
      AutoSize = False
      Caption = 
        '    '#25552#31034#65306#35813#21151#33021#23558#25439#30410#31867#31185#30446#30340#20313#39069#36716#20837#25152#36873#25321#30340#32467#36716#31185#30446#65292#24182#29983#25104#30456#24212#30340#35760#24080#20973#35777#12290#38500'"'#20197#21069#24180#24230#25439#30410#35843#25972'"'#31185#30446#24212#32467#36716#21040'"'#21033#28070#20998#37197'"' +
        #31185#30446#22806#65292#20854#20182#25439#30410#31867#31185#30446#24212#32467#36716#21040'"'#26412#24180#21033#28070'"'#31185#30446#12290
      WordWrap = True
      ExplicitLeft = 14
      ExplicitTop = 48
      ExplicitWidth = 361
      ExplicitHeight = 54
    end
    inherited img3: TImage
      Left = 341
      ExplicitLeft = 341
    end
    inherited Bevel1: TBevel
      Top = 107
      Width = 392
      ExplicitTop = 107
      ExplicitWidth = 392
    end
  end
  inherited pnlBottom: TPanel
    Top = 328
    Width = 392
    ExplicitTop = 328
    ExplicitWidth = 392
    inherited bvl1: TBevel
      Width = 392
      ExplicitWidth = 392
    end
    inherited btnOK: TcxButton
      Left = 215
      Caption = #25191#34892'(&O)'
      ModalResult = 0
      OnClick = btnOKClick
      ExplicitLeft = 215
    end
    inherited btnCancel: TcxButton
      Left = 298
      OnClick = btnCancelClick
      ExplicitLeft = 298
    end
  end
  object pnlEdit: TPanel
    Left = 0
    Top = 110
    Width = 392
    Height = 218
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 2
    DesignSize = (
      392
      218)
    object Label1: TLabel
      Left = 18
      Top = 11
      Width = 6
      Height = 12
      Transparent = True
    end
    object Label2: TLabel
      Left = 18
      Top = 16
      Width = 120
      Height = 12
      Caption = #32467#36716#26412#26399#25439#30410#20973#35777#23383#65306
      Transparent = True
    end
    object Label6: TLabel
      Left = 18
      Top = 70
      Width = 156
      Height = 12
      Caption = #20854#20182#25439#30410#31867#31185#30446#30340#32467#36716#31185#30446#65306
      Transparent = True
    end
    object lblPriorSub: TLabel
      Left = 18
      Top = 42
      Width = 156
      Height = 12
      Caption = #20197#21069#24180#24230#25439#30410#35843#25972#32467#36716#31185#30446#65306
      Transparent = True
    end
    object edtVouword: TcxDBLookupComboBox
      Tag = 64
      Left = 208
      Top = 12
      DataBinding.DataField = 'vouwordid'
      DataBinding.DataSource = dsPL
      Properties.ListColumns = <>
      TabOrder = 0
      Width = 145
    end
    object edtPriorSub: TcxDBLookupComboBox
      Tag = 63
      Left = 208
      Top = 38
      DataBinding.DataField = 'priorsub'
      DataBinding.DataSource = dsPL
      Properties.ListColumns = <>
      TabOrder = 1
      Width = 145
    end
    object edtOtherSub: TcxDBLookupComboBox
      Tag = 63
      Left = 208
      Top = 66
      DataBinding.DataField = 'othersub'
      DataBinding.DataSource = dsPL
      Properties.ListColumns = <>
      TabOrder = 2
      Width = 145
    end
    object pnlProfit: TPanel
      Left = -1
      Top = 90
      Width = 394
      Height = 56
      BevelOuter = bvNone
      TabOrder = 3
      Visible = False
      object Label7: TLabel
        Left = 19
        Top = 7
        Width = 126
        Height = 12
        Caption = #38750#38480#23450#24615#25910#20837#32467#36716#31185#30446':'
        Transparent = True
      end
      object Label8: TLabel
        Left = 19
        Top = 36
        Width = 90
        Height = 12
        Caption = #36153#29992#31867#32467#36716#31185#30446':'
        Transparent = True
      end
      object edtExpenseSub: TcxDBLookupComboBox
        Tag = 63
        Left = 208
        Top = 32
        DataBinding.DataField = 'expensesub'
        DataBinding.DataSource = dsPL
        Properties.ListColumns = <>
        TabOrder = 0
        Width = 145
      end
      object edtNotLimitSub: TcxDBLookupComboBox
        Tag = 63
        Left = 208
        Top = 3
        DataBinding.DataField = 'notlimitsub'
        DataBinding.DataSource = dsPL
        Properties.ListColumns = <>
        TabOrder = 1
        Width = 145
      end
    end
    object chkRed: TcxCheckBox
      Left = 18
      Top = 161
      Anchors = [akLeft, akBottom]
      Caption = #29983#25104#20973#35777#20801#35768#20986#29616#32418#23383
      TabOrder = 4
      Transparent = True
    end
    object chkBinder: TcxCheckBox
      Left = 18
      Top = 188
      Anchors = [akLeft, akBottom]
      Caption = #23558#32467#36716#26412#26399#25439#30410#20135#29983#30340#20973#35777#31435#21363#30331#24080
      TabOrder = 5
      Transparent = True
    end
  end
  object cdsPL: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 244
    Top = 252
    object cdsPLvouwordid: TIntegerField
      FieldName = 'vouwordid'
    end
    object cdsPLpriorsub: TIntegerField
      FieldName = 'priorsub'
    end
    object cdsPLothersub: TIntegerField
      FieldName = 'othersub'
    end
    object cdsPLnotlimitsub: TIntegerField
      FieldName = 'notlimitsub'
    end
    object cdsPLexpensesub: TIntegerField
      FieldName = 'expensesub'
    end
  end
  object dsPL: TDataSource
    DataSet = cdsPL
    Left = 292
    Top = 256
  end
  object qrySubject: TUniQuery
    Connection = MainDM.UniConn
    Left = 4
    Top = 84
  end
  object qryTmp: TUniQuery
    Connection = MainDM.UniConn
    Left = 160
    Top = 92
  end
  object qry_CarryPlamt: TUniQuery
    Connection = MainDM.UniConn
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 340
    Top = 108
  end
end
